home *** CD-ROM | disk | FTP | other *** search
/ Workbench Design / WB Collection.iso / workbench werkzeuge / dateimanager / filer / rexx / mpegplay.filer < prev    next >
Text File  |  1996-04-07  |  698b  |  39 lines

  1. /* 
  2.  
  3.    $VER: MPEGPlay.filer 1.2 (2.4.95)
  4.  
  5.    Author:
  6.     Matthias Scheler (tron@lyssa.pb.owl.de)
  7.  
  8.    Function:
  9.     Plays MPEG files with Michael van Elst's mp V1.03.
  10.     It pops up a requester asking to use HAM6 instead of the GRAY.
  11.  
  12.    History:
  13.     1.2   removed unnecessary ADDRESS 'FilerRexx'
  14.  
  15.    Requires:
  16.     mp V1.03 or newer
  17.  
  18.    Call:
  19.     MPEGPlay FILENAME
  20.  
  21.    Example for "Filer.RC":
  22.     REXXCLASS "#?.mpg","","MPEGPlay %s"
  23.  
  24. */
  25.  
  26. PARSE ARG FileName
  27.  
  28. OPTIONS RESULTS
  29.  
  30. 'STATUS Playing MPEG Animation' FileName
  31. PANEL OFF
  32.  
  33. QUESTBOX 'Play animation in HAM6 ?'
  34. IF RESULT THEN EXEC 'mp -dither ham6' FileName
  35. ELSE EXEC 'mp -dither gray' FileName
  36.  
  37. PANEL ON
  38. 'HISTORY Played MPEG Animation' FileName
  39.